home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2.0 - Programmer's Utilities Power Pack / Delphi 2.0 Programmer's Utilities Power Pack.iso / a_to_d / ansmach / ansmach1.dfm / ansmach1.txt
Encoding:
Text File  |  1996-09-15  |  1.6 KB  |  91 lines

  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 100
  4.   BorderStyle = bsSingle
  5.   Caption = 'Answering Machine Demo'
  6.   ClientHeight = 224
  7.   ClientWidth = 344
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Menu = MainMenu1
  13.   PixelsPerInch = 96
  14.   OnCreate = FormCreate
  15.   OnDestroy = FormDestroy
  16.   OnShow = FormShow
  17.   TextHeight = 16
  18.   object Label1: TLabel
  19.     Left = 216
  20.     Top = 8
  21.     Width = 72
  22.     Height = 16
  23.     Caption = 'Forwarding'
  24.   end
  25.   object Label2: TLabel
  26.     Left = 216
  27.     Top = 64
  28.     Width = 100
  29.     Height = 16
  30.     Caption = 'Max Messages'
  31.   end
  32.   object Label3: TLabel
  33.     Left = 216
  34.     Top = 120
  35.     Width = 68
  36.     Height = 16
  37.     Caption = 'Messages'
  38.   end
  39.   object ListBox1: TListBox
  40.     Left = 8
  41.     Top = 8
  42.     Width = 201
  43.     Height = 201
  44.     ItemHeight = 16
  45.     TabOrder = 0
  46.   end
  47.   object txtForward: TEdit
  48.     Left = 216
  49.     Top = 32
  50.     Width = 113
  51.     Height = 25
  52.     TabOrder = 1
  53.     Text = '555-0000'
  54.   end
  55.   object txtMaxMsg: TEdit
  56.     Left = 216
  57.     Top = 88
  58.     Width = 41
  59.     Height = 25
  60.     MaxLength = 1
  61.     TabOrder = 2
  62.     Text = '1'
  63.   end
  64.   object txtMsgCount: TEdit
  65.     Left = 216
  66.     Top = 144
  67.     Width = 41
  68.     Height = 25
  69.     TabOrder = 3
  70.     Text = '0'
  71.   end
  72.   object MainMenu1: TMainMenu
  73.     Left = 288
  74.     Top = 160
  75.     object File1: TMenuItem
  76.       Caption = '&File'
  77.       object mnAbout: TMenuItem
  78.         Caption = '&About'
  79.         OnClick = mnAboutClick
  80.       end
  81.       object N2: TMenuItem
  82.         Caption = '-'
  83.       end
  84.       object Exit1: TMenuItem
  85.         Caption = 'E&xit'
  86.         OnClick = Exit1Click
  87.       end
  88.     end
  89.   end
  90. end
  91.